inherited OptionsPopupBlockerFrm: TOptionsPopupBlockerFrm Width = 441 Height = 283 object PopupBlockerGroupBox: TGroupBox Left = 0 Top = 0 Width = 441 Height = 87 Anchors = [akLeft, akTop, akRight] Caption = ' Popup Blocker ' TabOrder = 0 object Image8: TImage Left = 10 Top = 20 Width = 32 Height = 32 AutoSize = True Picture.Data = {} Transparent = True end object EnablePopupBlockerBtn: TCheckBox95 Left = 60 Top = 20 Width = 126 Height = 17 Caption = '&Enable Popup Blocker' TabOrder = 0 OnClick = EnablePopupBlockerBtnClick end object ShowPopupBlockerCountBtn: TCheckBox95 Left = 60 Top = 40 Width = 151 Height = 17 Caption = '&Show blocked popup count' TabOrder = 1 end object ResetPopupBlockerCountBtn: THyperLink Left = 78 Top = 58 Width = 86 Height = 15 WordWrap = False Caption = 'Reset Count Now' TabOrder = 2 OnClick = ResetPopupBlockerCountBtnClick HottrackFont.Charset = DEFAULT_CHARSET HottrackFont.Color = clWindowText HottrackFont.Height = -11 HottrackFont.Name = 'MS Sans Serif' HottrackFont.Style = [] end object AnimatePopupButtonBtn: TCheckBox95 Left = 220 Top = 20 Width = 180 Height = 17 Caption = 'Animate when a popup is &blocked' TabOrder = 3 end object PlaySoundBtn: TCheckBox95 Left = 220 Top = 40 Width = 203 Height = 17 Caption = '&Play a sound when a popup is blocked' TabOrder = 4 end object ChangeCursorBtn: TCheckBox95 Left = 220 Top = 60 Width = 214 Height = 17 Caption = '&Change pointer when a popup is blocked' TabOrder = 5 end end object AllowedSitesGroupBox: TGroupBox Left = 0 Top = 97 Width = 441 Height = 186 Anchors = [akLeft, akTop, akRight, akBottom] Caption = ' Allowed Sites ' TabOrder = 1 DesignSize = ( 441 186) object Image10: TImage Left = 10 Top = 20 Width = 32 Height = 32 AutoSize = True Picture.Data = {} Transparent = True end object AddAllowedSiteBtn: TButton95 Left = 360 Top = 19 Width = 70 Height = 23 Anchors = [akTop, akRight] Caption = '&Add' TabOrder = 2 OnClick = AddAllowedSiteBtnClick end object DeleteExceptionBtn: TButton95 Left = 360 Top = 50 Width = 70 Height = 23 Anchors = [akTop, akRight] Caption = 'De&lete' Enabled = False TabOrder = 3 OnClick = DeleteExceptionBtnClick end object BlockedUrlsCombo: TComboBox Left = 60 Top = 20 Width = 293 Height = 21 Anchors = [akLeft, akTop, akRight] ItemHeight = 13 MaxLength = 512 TabOrder = 0 OnChange = BlockedUrlsComboChange end object PopupExceptionsView: TListBox Left = 60 Top = 50 Width = 293 Height = 122 Anchors = [akLeft, akTop, akRight, akBottom] ItemHeight = 13 TabOrder = 1 OnClick = PopupExceptionsViewClick OnKeyUp = PopupExceptionsViewKeyUp end end end